Polarisierte Wellen

Start

Stop

Welle(x,y)

Welle(x,z)

Welle(x,y,z)

A_1 = 2 (slider from 1 to 10, step 0.1)
A_2 = 2 (slider from 1 to 10, step 0.1)
ω_1 = 2 (slider from 0.1 to 10, step 0.1)
ω_2 = 2 (slider from 0.1 to 10, step 0.1)
φ = 1.5707963267948966 rad (slider from 0 to 6.283185307179586, step 0.08726646259971647)
f_1(x) = (A_1 * sin((ω_1 * x) + φ))
f(x) = If[-5 ≤ x ≤ 5, f_1(x)]
g(x) = (A_2 * sin((ω_2 * x)))
A = Point(f)
B = Point({x(A), 0, 0})
C = Point({x(A), g(x(A))})
u = Vector(B, A)
D = Point({x(A), 0, g(x(A))})
v = Vector(B, D)
E = Point({x(A), y(A), g(x(A))})
w = Vector(B, E)
h(x, y) = If[y ≟ 0, g(x)]
a = true
b = true
c = true